home *** CD-ROM | disk | FTP | other *** search
- /* vmtrace/ccc - 02/29/84 - jim kyle
- *
- * used to debug VM modules; displays report of
- * critical variables on screen. called from many
- * points in VM package; VMED10 contains a null
- * version normally used, VMTRACE/CCC is #INCLUDEd
- * instead for debugging.
- */
- t_r(s) char *s; /* identify reporting point */
- { printf("\n%s:\n",s);
- t_pl();
- zpaws();
- }
-
- t_pl() /* display values */
- { t_x("prev",*Pvptr);
- t_x("curr",Curr);
- t_x("next",*Nxptr);
- putchar('\n');
- t_d("flcb",Flcb);
- t_d("c_ln",Cur_ln);
- t_d("llcb",Llcb);
- putchar('\n');
- t_x("cl len",getwd(clad()));
- t_x("cl adr",clad());
- t_x("eob adr",eob());
- t_x("blk siz",*Bcptr);
- putchar('\n');
- }
-
- zpaws() /* wait for user to press ENTER */
- { while (getchar() != '\n') ; }
-
- t_x(s,n) int n; char *s;
- { printf("%s:%04x ",s,n); }
-
- t_d(s,n) char *s; int n;
- { printf("%s:%-4d ",s,n); }
-